/WMDrawMark {
/WMPicSave save def
initgraphics
/showpage {} def
0 792 translate
1 -1 scale